%!PS-Adobe-2.0
%%Title: diplomacy map (Ancient Mediterranean)
%%Creator: mapit
%%Pages: (atend) 1
%%BoundingBox: 0 0 612 792
%%DocumentPaperSizes: Letter
%%Orientation: Landscape
%%EndComments
%%EndProlog

% INFO
% 274 -132 Adr Adriatic Sea
% 412 -240 Aeg Aegean Sea
% 450 -355 Ale Alexandria
% 563 -227 Ant Antioch
% 278 -162 Apu Apulia
% 598 -280 Ara Arabia
% 595 -140 Arm Armenia
% 370 -218 Ath Athens
% 300 -270 Aus Ausonian Sea
% 125 -175 Bal Baleares
% 420 -440 Bay Bayuda
% 150 -210 Ber Berber Sea
% 487 -140 Bit Bithynia
% 465 -100 Bla Black Sea
% 440 -185 Byz Byzantium
% 540 -190 Cap Cappadocia
% 180 -260 Car Carthage
% 460 -50  Che Chersonesus
% 525 -249 Cil Cilician Strait
% 155 -310 Cir Cirta
% 200 -150 Cor Corsica
% 410 -277 Cre Crete
% 507 -271 Cyp Cyprus
% 375 -355 Cyr Cyrene
% 400 -100 Dac Dacia
% 310 -128 Dal Dalmatia
% 602 -210 Dam Damascus
% 446 -310 Egy Egyptian Sea
% 341 -200 Epi Epirus
% 200 -100 Etr Etruria
% 486 -182 Gal Galatia
% 150 -50  Gau Gaul
% 519 -320 GoP Gulf of Pelusium
% 312 -345 GoS Gulf of Syrtis
% 260 -315 GoT Gulf of Tacape
% 60  -257 Ibe Iberian Sea
% 335 -115 Ill Illyria
% 323 -233 Ion Ionian Sea
% 490 -225 Isa Isauria
% 552 -311 Jer Jerusalem
% 300 -380 Lep Leptis
% 370 -307 Lib Libyan Sea
% 165 -145 Lig Ligurian Sea
% 50  -150 Lus Lusitania
% 375 -165 Mac Macedonia
% 360 -410 Mar Marmarica
% 175 -105 Mas Massilia
% 123 -300 Mau Mauretania
% 480 -405 Mem Memphis
% 360 -277 Mes Messenian Sea
% 445 -225 Mil Miletus
% 450 -268 Min Minoan Sea
% 600 -355 Nab Nabatea
% 283 -187 Nea Neapolis
% 215 -330 Num Numidia
% 565 -365 Pet Petra
% 240 -385 Pha Phazania
% 215 -230 Pun Punic Sea
% 248 -123 Rav Ravenna
% 595 -435 Ree Reed Sea
% 225 -50  Rha Rhaetia
% 235 -139 Rom Roma
% 50 -225  Sag Saguntum
% 225 -450 Sah Sahara
% 200 -195 Sad Sardinia
% 330 -60  Sam Sarmatia
% 260 -242 Sic Sicilia
% 567 -255 Sid Sidon
% 534 -340 Sin Sinai
% 533 -142 Sip Sinope
% 368 -238 Spa Sparta
% 530 -287 Syr Syrian Sea
% 100 -155 Tar Tarraconensis
% 200 -297 Tha Thapsus
% 544 -415 The Thebes
% 565 -283 Tye Tyre
% 234 -180 Tyn Tyrrhenean Sea
% 235 -78  Ven Venetia
% 260 -55  Vin Vindobona
% MAP

% The original map postscript code is from William Roberts, 30/4/92

% * modified by George Boyce for use with his mapit program, i.e.
% * this file provides the following procedures:
% *
% * DrawMap      draws the base map
% * DrawName     draws a province name
% * DrawArmy     draws an army
% * DrawFleet    draws a fleet
% * DrawTitle    write game title
% * DrawMessage  write a footnote/message
%
% * OrderReport   positions point to write order report
% * RetreatReport
% * OwnerReport
% * AdjustReport
% * StatusReport
%
% * WriteOrder   writes the order line
% * WriteRetreat
% * WriteOwner
% * WriteAdjust
% * WriteStatus
%
% * ArrowMove    draws arrow indicating a move order
% * ArrowHold
% * ArrowSupport
% * ArrowConvoy
% * ArrowRetreat
%
% * BuildUnit    draws ray around newly built unit
% * DestroyUnit  draws slash through destroyed unit
% * DisbandUnit
% * RemoveUnit
%
% * ArrowArrive  used in blind games
% * ArrowDepart
% * ArrowRetreatArrive
% * ArrowRetreatDepart
% * FindUnit
% * LoseUnit
%

% shorthands:
/bd { bind def } bind def
/xd { exch def } bd
/ld { load def } bd

% constants:
  /NameOffset {LetterSize} def		% distance below point to draw name
  /UnitOffset 4 def			% distance above point to draw unit
  /UnitHeight 12 def			% maximum unit height
  /UnitHeightOffset UnitOffset UnitHeight add def

  /TitleFontSize 18 def			% font size (Times-Roman)
  /MessageFontSize 8 def		% font size (Times-Roman)
  /NameFontSize 7 def			% font size (Helvetica-Bold)
  /OrderFontSize 7 def			% font size (Courier)
  /OwnerFontSize 8 def			% font size (Courier)

  /TitleColumnWidth 140 def

  /HeadLength 10 def			% of a move arrow head
  /HalfHeadThickness 5 2 div def	

  /HalfThickness 1 2 div def		% of a move/support/convoy arrow shaft

  /HoldCircle 10 def	% of a support hold arrow
  /MoveCircle 4 def	% of a support move arrow
  /ConvoyCircle 6 def	% of a convoy arrow

/ShowPage /showpage load def	% nothing special required

/OrderReport {	% to the right of the map
 maxx 5 add maxy 55 sub moveto
 /Courier findfont OrderFontSize scalefont setfont
} def
/RetreatReport { % below order report with a title in slightly larger font
 maxx 5 add maxy 400 sub moveto
 /Courier-Bold findfont OrderFontSize 2 add scalefont setfont
 currentpoint OrderFontSize sub 2 sub (Retreat orders:) show moveto
 /Courier findfont OrderFontSize scalefont setfont
} def
/OwnerReport {	% below left half of map
 minx miny 10 sub moveto
 /Courier findfont OwnerFontSize scalefont setfont
} def
/AdjustReport {	% below right half of map
 minx 450 add miny 10 sub moveto
 /Courier findfont OwnerFontSize scalefont setfont
} def
/StatusReport {	% in upper right corner of map
 maxx 100 sub maxy 10 sub moveto
 /Courier findfont OwnerFontSize scalefont setfont
} def

/Write { currentpoint 3 2 roll show moveto 0 FontSize neg rmoveto } def
/WriteOrder { /FontSize OrderFontSize def Write } def
/WriteRetreat { WriteOrder } def
/WriteOwner { /FontSize OwnerFontSize def Write } def
/WriteAdjust { WriteOwner } def
/WriteStatus { WriteOwner } def

% failed orders get dashed lines, good orders normal lines
/FailedOrder { [2] 1 setdash } def
/OkOrder { [] 0 setdash } def

/DrawTitle {
 maxx 5 add maxy 15 sub moveto
 /Times-Roman findfont TitleFontSize scalefont setfont
 currentpoint (DIPLOMACY) show moveto
 0 TitleFontSize neg rmoveto  dup stringwidth pop dup TitleColumnWidth gt {
    TitleColumnWidth exch div dup 1 scale exch
    show
    1 exch div 1 scale
  }{
    pop show
  } ifelse
} def

/DrawMessage {
 minx maxy MessageFontSize add moveto
 /Times-Roman findfont MessageFontSize scalefont setfont
 show
} def

% draw an arrow indicating a move order between two points
/ArrowMove {
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  /dx tipx tailx sub def
  /dy tipy taily sub def
  /angle dy dx atan def

% positon origin at base of arrow with arrow point along x axis
  gsave
  tailx taily translate
  angle rotate

  /arrowlength dx dx mul dy dy mul add sqrt def
  /base arrowlength HeadLength sub def

  % if base of arrow is long enough, shorten it
  % e.g. which moves arrow start beyond support circle
  /x base LetterSize gt {/base base LetterSize sub def LetterSize /arrowlength arrowlength LetterSize sub def} {0} ifelse def
  % if base is still 5 or longer, shorten it some more
  % which makes arrow head touch support circle
  base LetterSize ge {/base base LetterSize sub def /arrowlength arrowlength LetterSize sub def} if

  x 0 translate

  newpath
  0 HalfThickness neg moveto
  base HalfThickness neg lineto
  base HalfHeadThickness neg lineto
  arrowlength 0 lineto
  base HalfHeadThickness lineto
  base HalfThickness lineto
  0 HalfThickness lineto
  closepath

  stroke

  grestore
} def

% draw an arrow indicating support of a unit holding at p1
/ArrowHold {
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  tailx taily tipx tipy HoldCircle ArrowCircle

} def

% draw arrow indicating support of a unit moving from p1 to p2
/ArrowSupport {
  /y2 exch def
  /x2 exch def
  /y1 exch def
  /x1 exch def
  /taily exch def
  /tailx exch def

% find midpoint of (x1,y1)-(x2,y2)
  /tipx x1 x2 min x1 x2 sub abs 2 div add def
  /tipy y1 y2 min y1 y2 sub abs 2 div add def

  tailx taily tipx tipy MoveCircle ArrowCircle

} def

% draw arrow indicating convoy of a unit moving from p1 to p2
/ArrowConvoy {
  /y2 exch def
  /x2 exch def
  /y1 exch def
  /x1 exch def
  /taily exch def
  /tailx exch def

% find midpoint of (x1,y1)-(x2,y2)
  /tipx x1 x2 min x1 x2 sub abs 2 div add def
  /tipy y1 y2 min y1 y2 sub abs 2 div add def

  tailx taily tipx tipy ConvoyCircle ArrowCircle

} def

% draw an arrow indicating a retreat order between two points
/ArrowRetreat {
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  /dx tipx tailx sub def
  /dy tipy taily sub def
  /angle dy dx atan def

% positon origin at base of arrow with arrow point along x axis
  gsave
  Red
  tailx taily translate
  angle rotate

  /arrowlength dx dx mul dy dy mul add sqrt def
  /base arrowlength HeadLength 2 mul HalfThickness HalfHeadThickness div sub sub def

  % if base of arrow is long enough, shorten it
  % e.g. which moves arrow start beyond support circle
  /x base LetterSize gt {/base base LetterSize sub def LetterSize /arrowlength arrowlength LetterSize sub def} {0} ifelse def
  % if base is still 5 or longer, shorten it some more
  % which makes arrow head touch support circle
  base LetterSize ge {/base base LetterSize sub def /arrowlength arrowlength LetterSize sub def} if

  /headBase arrowlength base add HalfThickness HalfHeadThickness div sub 2 div def

  x 0 translate

  newpath
  0 HalfThickness neg moveto
  base HalfThickness neg lineto
  base HalfHeadThickness neg lineto
  headBase HalfThickness neg lineto
  headBase HalfHeadThickness neg lineto
  arrowlength 0 lineto
  headBase HalfHeadThickness lineto
  headBase HalfThickness lineto
  base HalfHeadThickness lineto
  base HalfThickness lineto
  0 HalfThickness lineto
  closepath

  stroke

  grestore
} def

/ArrowCircle {	% like an arrow but with a circle at the tip
  /headdiam exch def
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  /dx tipx tailx sub def
  /dy tipy taily sub def
  /arrowlength dx dx mul dy dy mul add sqrt def
  /angle dy dx atan def
  /base arrowlength headdiam sub def

% positon origin at base of arrow with arrow point along x axis
  gsave
  tailx taily translate
  angle rotate

  % if base of arrow is long enough, shorten it by LetterSize
  % e.g. which moves arrow start beyond support circle
  /x base LetterSize gt {/base base LetterSize sub def /arrowlength arrowlength LetterSize sub def LetterSize} {0} ifelse def

  x 0 translate

% draw the shaft first...
  base HalfThickness neg moveto
  0 HalfThickness neg lineto
  0 HalfThickness lineto
  base HalfThickness lineto
% now the circle...
  /a 180 HalfThickness headdiam 2 div atan sub def
  /b 180 HalfThickness headdiam 2 div atan add def
  arrowlength 0 headdiam a b arcn

  closepath
  stroke
  grestore
} def

% draw an arrow indicating an arrival order to a destination point
/ArrowArrive {

% positon origin at base of arrow with arrow point along x axis
  gsave
  translate
  -1 -1 scale

  /arrowlength 20 def
  /base arrowlength HeadLength sub def

  LetterSize arrowlength add neg 0 translate

  newpath
  0 HalfThickness neg moveto
  base HalfThickness neg lineto
  base HalfHeadThickness neg lineto
  arrowlength 0 lineto
  base HalfHeadThickness lineto
  base HalfThickness lineto
  0 HalfThickness lineto
  closepath

  stroke

  HalfThickness 10 mul neg HalfThickness neg HalfThickness 4 mul HalfThickness 2 mul rectstroke
  HalfThickness 20 mul neg HalfThickness neg HalfThickness 4 mul HalfThickness 2 mul rectstroke

  grestore
} bind def

% draw an arrow indicating a departure order from a source point
/ArrowDepart {

% positon origin at base of arrow with arrow point along x axis
  gsave
  translate
  -1 -1 scale

  /arrowlength 14 def

  LetterSize 0 translate

  0 HalfThickness neg arrowlength HalfThickness 2 mul rectstroke

  arrowlength HalfThickness 6 mul add HalfThickness neg HalfThickness 4 mul HalfThickness 2 mul rectstroke
  arrowlength HalfThickness 16 mul add HalfThickness neg HalfThickness 4 mul HalfThickness 2 mul rectstroke

  grestore
} bind def

% draw an arrow indicating an arrival order to a destination point during retreat
/ArrowRetreatArrive {

% positon origin at base of arrow with arrow point along x axis
  gsave
  Red
  translate
  -1 -1 scale

  /arrowlength 20 HeadLength add def
  /base arrowlength HeadLength 2 mul HalfThickness HalfHeadThickness div sub sub def
  /headBase arrowlength base add HalfThickness HalfHeadThickness div sub 2 div def

  LetterSize arrowlength add neg 0 translate

  newpath
  0 HalfThickness neg moveto
  base HalfThickness neg lineto
  base HalfHeadThickness neg lineto
  headBase HalfThickness neg lineto
  headBase HalfHeadThickness neg lineto
  arrowlength 0 lineto
  headBase HalfHeadThickness lineto
  headBase HalfThickness lineto
  base HalfHeadThickness lineto
  base HalfThickness lineto
  0 HalfThickness lineto
  closepath

  stroke

  HalfThickness 10 mul neg HalfThickness neg HalfThickness 4 mul HalfThickness 2 mul rectstroke
  HalfThickness 20 mul neg HalfThickness neg HalfThickness 4 mul HalfThickness 2 mul rectstroke

  grestore
} bind def

% draw an arrow indicating a departure order from a source point during retreat
/ArrowRetreatDepart {
	gsave Red ArrowDepart grestore
} bind def

% draw the given name centered just below the specified point
/DrawName { % x y str => -
 gsave
 /Helvetica-Bold findfont NameFontSize scalefont setfont
 3 1 roll translate
% mark the spot...
% 0 0 5 0 360 arc fill
 dup stringwidth pop
 -2 div 0 NameOffset sub moveto show
 grestore
} def

% Letters for the different countries
%
% 0 means "nobody", then 1-7 going clockwise from England
/Countries [
  (?) (C) (E) (G) (P) (R)
] def

/country 0 def

/Black { 0 0 0 setrgbcolor }   bind def
/White { 0.9 0.9 0.9 setrgbcolor }   bind def
/Grey  { 0.7 setgray } bind def

/Red    { 1 0 0   setrgbcolor } bind def
/Pink   { 0.3 0 0 setrgbcolor } bind def
/Blue   { 0 0 1   setrgbcolor } bind def
/Mauve  { 1 0 1   setrgbcolor } bind def
/Yellow { 1 1 0   setrgbcolor } bind def
/Orange { 1 0.5 0.3  setrgbcolor } bind def
/Green  { 0 0.7 0 setrgbcolor } bind def
/Brown  { 0.6 0.45 0.2 setrgbcolor } bind def
/Turquoise { 0.2 0.7 0.7 setrgbcolor } bind def
% /Turquoise { 0.1 0.6 0.6 setrgbcolor } bind def
% /Seawater { 0.5 0.8 0.9 setrgbcolor } bind def
/Seawater { 0.1 0.4 0.6 setrgbcolor } bind def
/Riverwater { 0.1 0.4 0.8 setrgbcolor } bind def
% /Brown  { 0.7 0.5 0.2 setrgbcolor } bind def <-- Bruce


% Piece colourname, Contrast colourname
%
/UnownedColours { /Brown /White } def
/EgyptColours { /Yellow  /Black } def
/CarthageColours { /Blue /White } def
/GreeceColours  { /Green /Black } def
/RomeColours  { /Red /Black } def
/PersiaColours { /Black /White } def

/set_country { % N /piececolour /contrast => -
    load /Contrast exch store
    load /PieceColour exch store
    /country exch store
} bind def

/UNOWNED  { 0 UnownedColours set_country } def
/CARTHAGE { 1 CarthageColours set_country } def
/EGYPT    { 2 EgyptColours  set_country } def
/GREECE   { 3 GreeceColours set_country } def
/PERSIA   { 4 PersiaColours  set_country } def
/ROME     { 5 RomeColours  set_country } def

/Offsets 6 array def

/max { % p q => max(p,q)
  2 copy lt { exch} if pop
} bind def

/min { % p q => min(p,q)
  2 copy gt { exch} if pop
} bind def

/InitLetters {
  0 0				% maxdx maxdy
  0 1 5 {
    /N exch def
    Countries N get	% maxdx maxdy (N)
    newpath 0 0 moveto
    true charpath pathbbox     % ... llx lly urx ury
    %
    % Compute the offset in to centre the letter at 0,0
       4 copy		% llx lly urx ury
       3 -1 roll add -2 div	% llx urx dy
       3 1 roll add -2 div	% dy dx
       exch 2 array astore	% [dx,dy]
       Offsets N 3 -1 roll put  % - ([dx,dy] stored in offsets)
    %
    % Update maximum xwidth, ywidth
    3 -1 roll sub		% llx urx leny
    3 1 roll exch sub exch	% lenx leny
    				% maxdx maxdy lenx leny
    3 -1 roll max		% maxdx lenx newmaxdy
    3 1 roll max		% newmaxdy newmaxdx
    exch
  } for

  newpath
  % maxdx maxdy = biggest bounding rectangle of the letters
  max 1.5 mul /LetterSize exch def
} def

/Helvetica-Bold findfont NameFontSize scalefont setfont InitLetters

/PieceColour { 1 setgray } bind def
/Contrast { 0 setgray } bind def

% Army is a little cannon...
/DrawArmy { % x y X => -
  country
  3 1 roll UnitOffset add
  gsave translate
    gsave 
      newpath
      LetterSize 14 div dup scale
      -20 7 moveto 30 0 rlineto 0 -4 rlineto 4 0 rlineto
       0 -2 rlineto -30 0 rlineto 0  2 rlineto -4 0 rlineto
       0 4 rlineto		% barrel
       4 2 moveto 20 -10 rlineto 2 0 rlineto -8 0 rlineto
      -20  10 rlineto		% carriage
      Contrast 2 setlinewidth stroke
      0 0 9 0 360 arc	% wheel
      closepath
      Contrast 2 setlinewidth stroke
      newpath
      -20 7 moveto 30 0 rlineto 0 -4 rlineto 4 0 rlineto
       0 -2 rlineto -30 0 rlineto 0  2 rlineto -4 0 rlineto
       0 4 rlineto		% barrel
       4 2 moveto 20 -10 rlineto 2 0 rlineto -8 0 rlineto
      -20  10 rlineto		% carriage
      PieceColour fill
      0 0 9 0 360 arc	% wheel
      closepath
      PieceColour fill
    grestore
    dup Offsets exch get aload pop	% N dx dy
    moveto
    /Helvetica-Bold findfont NameFontSize scalefont setfont
    Countries exch get Contrast show	% then a white letter
  grestore
} bind def

% Fleet is a little boat...
/DrawFleet { % N x y => -
  country
  3 1 roll UnitOffset add
  gsave translate
	3 dict begin
	/m /moveto ld
	/l /lineto ld
	/p { lineto closepath } bd
	2 .5 div setlinewidth [] 0 setdash
	gsave
	LetterSize 14 div .5 mul dup scale
	-35 -16 translate
	newpath
	12 3 m 12 9 l 9 12 l 6 13 l 6 17 l % bow
	9 17 l 9 23 l 2 22 l 7 16 l 6 16 l 1 22 l % bowsprit
	6 27 l 12 37 l 15 45 l % front sail
	19 44 l 19 48 l 16 48 l 15 49 l 19 49 l 19 55 l 20 55 l 20 49 l 24 49 l 23 48 l 20 48 l 20 44 l % front mast
	24 43 l 24 34 l 27 29 l 33 29 l 33 32 l 25 32 l 28 39 l 31 51 l % mid sail left
	35 50 l 35 54 l 30 54 l 29 55 l 35 55 l 35 63 l 36 63 l 36 56 l 36 55 l 42 55 l 41 54 l 36 54 l 36 50 l % mid mast
	41 49 l 41 32 l 36 32 l 36 29 l 39 29 l 41 43 l % mid sail right
	45 43 l 45 47 l 41 47 l 41 48 l 45 48 l 45 55 l 46 55 l 46 48 l 51 48 l 50 47 l 46 47 l 46 43 l % rear mast
	48 43 l 49 28 l 51 28 l 51 31 l 54 33 l 54 23 l 57 26 l 57 22 l 56 21 l % rear sail and flag
	56 15 l 59 12 l 59 7 l 57 4 l 55 3 p % bow
	gsave Contrast stroke grestore
	PieceColour fill
	grestore
	end
    dup Offsets exch get aload pop	% N dx dy
    moveto
    /Helvetica-Bold findfont NameFontSize scalefont setfont
    Countries exch get Contrast show	% then a white letter
  grestore
} bind def

% draw a ray around a newly built unit
/BuildUnit { % x y => -
  gsave
  UnitOffset add translate
  LetterSize 14 div dup scale
  White
  6 setlinewidth [ 1 8 ] 0 setdash
  newpath
  0 0 24 0 360 arc
  closepath stroke
  grestore
} bind def

% draw a slash through a unit
/SlashUnit { % x y => -
  UnitOffset add translate
  LetterSize 14 div dup scale
  newpath
  -21 -16 moveto
%  -5 0 lineto -21 16 lineto -11 16 lineto 0 5 lineto
  11 16 lineto
  21 16 lineto
%  5 0 lineto 21 -16 lineto 11 -16 lineto 0 -5 lineto
  -11 -16 lineto
  closepath
} bind def

% draw a slash through a destroyed unit
/DestroyUnit { % x y => -
  gsave
  SlashUnit
  Red fill
  grestore
} bind def

% draw a slash through a disbanded unit
/DisbandUnit { % x y => -
  gsave
  SlashUnit
  gsave White fill grestore Red 1 setlinewidth [] 0 setdash stroke
  grestore
} bind def

% draw a slash through a removed unit
/RemoveUnit { % x y => -
  gsave
  SlashUnit
  White fill
  grestore
} bind def

% draw a ray around a found unit
/FindUnit { % x y => -
  gsave
  UnitOffset add translate
  LetterSize 14 div dup scale
  Red
  6 setlinewidth [ 1 8 ] 0 setdash
  newpath
  0 0 24 0 360 arc
  closepath stroke
  grestore
} bind def

% draw a question mark on top of a lost unit
/LoseUnit { % x y => -
  gsave
  UnitHeightOffset add translate
  Offsets 0 get aload pop moveto
  /Helvetica-Bold findfont NameFontSize scalefont setfont
  (?) Red show
  grestore
} bind def

/DrawMap {
62 492 translate
90 rotate
-480 0 translate

  gsave
  
  mapcoord

  part1
  part2
  part3
    
  grestore
  
  {
    gsave
    Red
  
    1.5 setlinewidth
    -500 50 0 {
       dup 0 exch mt 
       650 exch li
       stroke
    } for
    0 50 650 {
       dup -500 mt 
       0 li
       stroke
    } for

    .5 setlinewidth
    -500 10 0 {
       dup 0 exch mt 
       650 exch li
       stroke
    } for
    0 10 650 {
       dup -500 mt 
       0 li
       stroke
    } for
    650 -500 mt (650, -500) show
    grestore
  } pop
  
  docenters
  % Credits

} def

/Credits {
% give credits
/Times-Roman findfont 13 scalefont setfont
10 -425 moveto
currentpoint (The Ancient Mediterranean) show
moveto 0 -12 rmoveto
/Times-Roman findfont 8 scalefont setfont
currentpoint (  Copyright 2001 Don Hessong) show
/Times-Roman findfont 6 scalefont setfont
moveto 0 -12 rmoveto
currentpoint (Electronic map by Don Hessong and Juho Snellman) show
moveto 0 -12 rmoveto
currentpoint (Diplomacy is a trademark of the Avalon Hill Game Company,) show
moveto 0 -6 rmoveto (Baltimore, Maryland, all rights reserved.) show
} def


/minx 10 def /maxx 630 def
/miny -470 def /maxy -10 def

/gm /moveto load def
/lin /lineto load def

/internal { gsave Internalborder stroke grestore newpath } def
/BORDER { gsave Nationalborder stroke grestore newpath} def

/lastborder { 
  gsave
    % frame 
    minx miny moveto
    minx maxy lineto
    maxx maxy lineto
    maxx miny lineto
    closepath
    [] 0 setdash 0 setgray
    gsave 4 setlinewidth stroke grestore
    clip 2 setlinewidth Landcolor stroke
  grestore
} def

/buffer 255 string def

/SEA {
    closepath
%    gsave Seacolour fill grestore
    gsave Seawater fill grestore
    gsave Coastcolour stroke grestore
    newpath
} def

/ISLAND {
    closepath
    gsave Landcolor fill grestore
    gsave Coastcolour stroke grestore
    newpath
} def

/SWITZERLAND {
    closepath
    gsave Swisscolour fill grestore
    BORDER
} def

1 setlinewidth
0 setgray

% /Seacolour { 0.9 setgray } def
/Coastcolour { 1 setlinewidth 0 setgray } def
/Swisscolour { 0.5 setgray } def
/Seawater { 0.1 0.4 0.6 setrgbcolor } bind def
% /Seawater { 0.5 0.8 0.9 setrgbcolor } bind def
/Landcolor  { 0.8 0.7 0.4 setrgbcolor } bind def
% /Landcolor  { 0.7 0.5 0.2 setrgbcolor } bind def <-- Bruce
/Continentcolor /Landcolor load def

% /Internalborder { 1 setlinewidth [3] 1.5 setdash 0 setgray } def
/Internalborder { 0.5 setlinewidth [3 1] 1.5 setdash 0 setgray } def
/Nationalborder { 2 setlinewidth 0 setgray } def

/supply {
  gsave translate
    PieceColour
    newpath
    0 0 3 0 360 arc
    gsave fill grestore 
    0.01 setlinewidth Black stroke
  grestore
} def


/ALE {496 -350} def
/ANT {555 -212} def
/ATH {382 -228} def
/BAL {125 -190} def
/BYZ {430 -163} def
/CAR {210 -260} def
/CHE {480 -75} def
/CIR {170 -293} def
/CRE {426 -283} def
/CYP {496 -279} def
/CYR {373 -337} def
/DAL {320 -145} def
/DAM {587 -240} def
/JER {552 -329} def
/LEP {280 -370} def
/MAC {380 -185} def
/MAS {175 -125} def
/MEM {500 -370} def
/MIL {433 -235} def
/NEA {292 -210} def
/NUM {225 -345} def
/PET {558 -345} def
/RAV {230 -105} def
/ROM {240 -155} def
/SAD {200 -215} def
/SAG {80 -229} def
/SIC {267 -259} def
/SID {557 -265} def
/SIP {512 -142} def
/SPA {365 -252} def
/THA {212 -303} def
/THE {525 -405} def
/TYE {555 -294} def
/VIN {279 -52} def

/docenters {
UNOWNED
SAG supply 
BAL supply 
SAD supply 
MAS supply 
ROM supply 
RAV supply 
VIN supply 
DAL supply 
NEA supply 
CIR supply 
CAR supply 
THA supply 
NUM supply 
LEP supply 
CYR supply 
ALE supply 
MEM supply 
THE supply 
PET supply 
JER supply 
TYE supply 
SID supply 
ANT supply 
DAM supply 
SIP supply 
CHE supply 
MIL supply 
BYZ supply 
SPA supply 
ATH supply 
MAC supply 
CRE supply 
CYP supply 
SIC supply 
Black 
} def

/mapcoord
{
   -.6 .7 scale
   180 rotate
}
def

/np {newpath} def
/mt {moveto} def
/li {lineto} def
/cp {closepath} def
/ct {curveto} def
/df {fill} def
/de {eofill} def
/ds {stroke} def
/ep {} def

% mapcoord

/part1
{
%%DSIBeginObject: #1 - Ref:554 Polygon
Continentcolor
np
17 12 mt
1047 12 li
1047 674 li
17 674 li
17 12 li
cp
de
%%DSIEndObject
%%DSIBeginObject: #2 - Ref:15 Group
%%DSIBeginObject: #3 - Ref:555 Bezier
Riverwater
% 1. 1. sp
% 0 lc
% 14.3 lm
% 0 lj
np
855 478 mt
854 478 854 478 853 479 ct
852 479 851 481 850 482 ct
850 483 849 487 848 487 ct
ds
%%DSIEndObject
%%DSIBeginObject: #4 - Ref:556 Bezier
Riverwater
np
841 477 mt
842 480 842 480 843 481 ct
845 481 844 482 846 483 ct
846 483 li
846 485 848 487 848 488 ct
848 490 847 490 847 492 ct
846 493 845 494 845 495 ct
844 496 845 498 845 499 ct
844 500 844 501 844 503 ct
ds
%%DSIEndObject
%%DSIBeginObject: #5 - Ref:559 Bezier
Riverwater
np
823 483 mt
825 487 826 487 827 488 ct
829 488 830 488 832 490 ct
833 490 835 491 836 492 ct
837 493 837 495 840 496 ct
ds
%%DSIEndObject
%%DSIBeginObject: #6 - Ref:560 Bezier
Riverwater
np
846 507 mt
846 507 848 504 848 503 ct
848 503 848 497 849 496 ct
850 495 850 493 851 493 ct
853 493 856 488 856 487 ct
857 486 856 483 856 483 ct
857 482 859 479 859 479 ct
ds
%%DSIEndObject
%%DSIBeginObject: #7 - Ref:561 Bezier
Riverwater
np
832 479 mt
833 481 834 482 834 483 ct
834 484 835 485 836 485 ct
836 486 837 487 838 488 ct
839 489 839 491 840 492 ct
840 493 839 496 840 497 ct
841 498 843 500 844 501 ct
845 504 li
845 506 li
ds
%%DSIEndObject
%%DSIBeginObject: #8 - Ref:562 Bezier
Riverwater
np
852 493 mt
858 493 862 495 864 496 ct
866 497 865 498 866 500 ct
ds
%%DSIEndObject
%%DSIBeginObject: #9 - Ref:638 Bezier
Riverwater
np
845 506 mt
849 510 850 518 850 519 ct
849 527 846 525 846 531 ct
846 532 847 533 847 534 ct
847 536 845 537 845 539 ct
844 541 843 543 844 546 ct
844 547 848 556 849 557 ct
849 559 853 563 854 563 ct
855 564 858 565 859 566 ct
860 566 863 565 863 564 ct
864 563 866 563 866 564 ct
867 565 867 567 866 569 ct
866 570 864 572 864 573 ct
863 575 866 577 867 578 ct
868 579 868 582 869 583 ct
870 586 872 589 871 591 ct
870 593 869 595 870 598 ct
870 598 874 600 876 602 ct
878 605 878 610 878 611 ct
879 615 878 614 877 615 ct
877 615 876 616 876 618 ct
876 620 875 621 875 622 ct
874 623 871 625 871 625 ct
869 626 867 626 865 627 ct
864 627 864 629 864 631 ct
864 631 860 635 859 636 ct
858 638 852 642 852 642 ct
851 643 849 648 849 649 ct
849 649 848 650 848 654 ct
849 658 851 656 851 660 ct
851 661 852 664 851 666 ct
851 668 848 669 848 669 ct
847 670 848 672 848 674 ct
ds
%%DSIEndObject
%%DSIEndObject
%%DSIBeginObject: #10 - Ref:565 Bezier
Seawater
np
17 174 mt
17 174 20 174 24 175 ct
28 176 32 179 35 179 ct
37 179 41 178 44 178 ct
50 178 56 179 61 180 ct
67 180 71 178 72 178 ct
74 178 76 179 78 180 ct
80 180 82 180 84 181 ct
87 181 89 182 91 183 ct
93 184 95 185 97 185 ct
99 186 101 186 103 186 ct
105 187 107 187 109 187 ct
111 187 113 187 115 187 ct
117 187 119 187 121 187 ct
123 187 125 188 128 188 ct
130 188 132 187 134 187 ct
136 186 136 186 138 184 ct
138 184 140 182 140 180 ct
140 178 140 176 141 174 ct
141 172 141 170 142 168 ct
142 166 142 164 142 162 ct
142 160 142 158 143 157 ct
143 155 144 153 144 151 ct
144 149 144 147 144 145 ct
144 143 144 141 144 139 ct
144 137 144 135 144 133 ct
143 131 144 129 145 127 ct
147 126 147 124 146 122 ct
146 120 143 117 143 115 ct
144 113 141 111 140 109 ct
140 107 136 106 137 104 ct
138 102 130 100 132 98 ct
133 96 134 96 135 94 ct
136 92 133 91 132 89 ct
131 87 129 89 126 87 ct
125 86 123 85 121 84 ct
118 82 115 82 115 80 ct
114 78 110 80 110 78 ct
111 76 97 76 98 74 ct
98 71 99 66 99 64 ct
100 62 105 57 107 56 ct
109 56 114 61 116 59 ct
118 58 122 57 124 57 ct
126 57 130 57 132 58 ct
134 59 131 60 143 53 ct
146 51 135 29 148 30 ct
149 30 156 43 160 41 ct
167 39 163 27 178 27 ct
189 28 190 26 194 24 ct
197 21 199 12 199 12 ct
17 12 li
17 174 li
de
%%DSIEndObject
%%DSIBeginObject: #11 - Ref:637 Bezier
Seawater
np
1047 673 mt
1046 673 1039 668 1033 662 ct
1030 658 1027 653 1024 651 ct
1020 646 1021 641 1019 637 ct
1016 631 1009 626 1004 622 ct
1003 621 1002 613 999 609 ct
998 606 992 597 991 596 ct
987 594 984 592 981 589 ct
978 587 977 589 973 584 ct
970 581 971 581 964 576 ct
957 570 957 566 955 563 ct
953 560 949 560 946 558 ct
944 555 942 552 940 551 ct
938 549 936 547 933 545 ct
931 542 925 541 923 539 ct
921 538 924 529 923 527 ct
922 524 922 518 921 515 ct
920 512 921 508 921 506 ct
920 503 919 503 918 506 ct
917 508 916 512 916 515 ct
916 517 916 521 916 523 ct
916 526 916 530 917 532 ct
917 535 918 537 918 540 ct
917 542 916 545 914 547 ct
914 547 911 544 908 544 ct
906 543 904 542 902 540 ct
900 538 900 537 898 535 ct
896 532 893 531 890 529 ct
888 527 888 523 886 521 ct
883 518 881 518 880 515 ct
879 512 877 510 875 507 ct
873 505 873 506 871 504 ct
869 501 867 498 865 500 ct
863 502 864 508 866 511 ct
869 514 869 512 871 514 ct
872 517 873 519 874 522 ct
875 524 875 526 877 528 ct
879 530 882 532 883 534 ct
885 537 889 537 891 540 ct
893 542 895 544 896 546 ct
898 548 897 551 900 553 ct
902 556 902 557 904 559 ct
906 562 904 565 906 568 ct
909 570 912 575 914 577 ct
916 580 917 581 920 585 ct
921 587 931 589 930 593 ct
929 599 935 598 938 602 ct
939 604 939 607 942 611 ct
945 617 948 621 951 622 ct
955 624 959 626 963 631 ct
964 632 967 630 971 639 ct
974 645 976 653 977 654 ct
984 661 990 673 990 673 ct
1047 673 li
cp
de
%%DSIEndObject
%%DSIBeginObject: #12 - Ref:25 Bezier
Seawater
np
479 525 mt
476 521 473 517 473 513 ct
472 508 462 507 459 503 ct
452 502 456 501 448 501 ct
443 496 440 498 435 496 ct
430 496 427 496 423 495 ct
420 494 414 492 410 490 ct
404 487 404 487 398 484 ct
392 485 389 479 385 478 ct
380 476 379 470 374 468 ct
367 463 367 463 361 458 ct
356 456 353 451 353 447 ct
355 443 358 439 362 435 ct
366 431 366 428 368 423 ct
374 418 373 414 369 409 ct
367 404 365 400 362 395 ct
362 393 361 391 363 388 ct
365 384 367 383 369 380 ct
372 375 376 369 373 367 ct
370 364 368 366 365 369 ct
363 369 360 369 358 368 ct
354 365 355 366 352 363 ct
349 362 347 361 345 361 ct
343 362 339 360 337 363 ct
334 363 334 363 331 364 ct
327 364 323 364 321 364 ct
317 364 312 362 309 362 ct
300 362 299 366 290 365 ct
286 364 285 363 279 361 ct
276 360 269 360 265 361 ct
261 362 248 361 243 361 ct
239 360 235 362 231 361 ct
228 360 227 364 224 363 ct
221 363 221 363 218 363 ct
214 364 204 362 200 363 ct
192 362 188 365 180 366 ct
178 366 176 368 173 369 ct
170 372 170 371 167 374 ct
164 376 164 376 161 378 ct
159 379 158 381 155 381 ct
148 386 142 385 135 387 ct
130 389 130 389 125 391 ct
122 392 122 392 120 392 ct
118 394 118 394 115 395 ct
112 396 108 390 105 391 ct
101 392 98 393 95 393 ct
93 393 92 392 90 391 ct
87 390 87 390 85 389 ct
82 388 78 389 75 387 ct
70 385 70 385 65 382 ct
61 381 59 381 55 381 ct
52 380 52 380 50 379 ct
49 380 46 379 45 377 ct
45 374 42 374 42 371 ct
41 368 41 368 40 366 ct
39 365 37 366 35 366 ct
31 368 31 369 31 372 ct
28 377 28 377 25 381 ct
24 384 20 392 17 391 ct
17 361 17 366 17 335 ct
22 336 27 338 28 344 ct
29 348 30 348 30 353 ct
31 357 35 361 41 360 ct
45 356 49 355 54 353 ct
59 349 63 347 69 345 ct
74 345 78 348 82 349 ct
87 351 91 351 96 351 ct
101 350 105 354 109 351 ct
111 347 112 347 115 344 ct
118 341 120 339 122 338 ct
125 339 127 336 130 335 ct
133 334 135 334 137 333 ct
139 330 137 328 140 326 ct
141 322 141 322 143 319 ct
146 315 146 315 150 312 ct
151 310 158 308 157 306 ct
151 300 149 295 147 290 ct
146 287 145 285 146 282 ct
147 280 149 277 149 275 ct
153 271 155 268 156 265 ct
157 262 157 262 159 260 ct
161 257 161 257 164 255 ct
164 252 165 249 167 246 ct
169 244 171 239 175 239 ct
177 238 177 238 179 236 ct
182 235 185 235 189 234 ct
194 233 194 233 199 231 ct
202 229 205 229 209 225 ct
212 221 215 224 219 223 ct
222 220 222 218 224 216 ct
223 214 226 212 223 209 ct
224 206 219 202 220 197 ct
223 194 222 191 227 188 ct
230 187 230 187 232 185 ct
234 185 235 184 236 184 ct
239 185 243 182 246 183 ct
248 184 248 184 250 184 ct
252 185 253 185 254 184 ct
257 183 260 183 264 186 ct
267 187 270 186 272 188 ct
276 189 278 189 282 189 ct
282 189 282 189 282 189 ct
284 190 287 189 290 188 ct
295 184 295 184 300 180 ct
304 178 304 178 308 176 ct
311 175 315 173 318 170 ct
320 167 323 166 326 164 ct
329 163 332 158 335 159 ct
338 159 342 160 344 161 ct
349 165 349 165 353 168 ct
357 171 357 171 361 175 ct
362 181 362 181 363 186 ct
364 189 364 189 365 192 ct
367 195 367 195 369 197 ct
373 203 373 203 377 208 ct
378 211 383 215 386 219 ct
391 224 391 224 397 230 ct
399 233 403 237 407 240 ct
410 243 410 243 413 245 ct
415 248 416 247 418 248 ct
422 249 426 249 429 251 ct
432 252 432 254 433 256 ct
434 258 434 260 436 262 ct
438 264 440 264 442 265 ct
445 266 445 266 447 266 ct
450 268 450 268 454 270 ct
455 273 455 273 456 276 ct
458 279 463 283 467 284 ct
469 284 470 286 473 289 ct
474 290 477 291 477 293 ct
478 299 478 299 480 304 ct
481 307 480 311 482 314 ct
482 317 482 321 478 325 ct
478 329 478 329 478 332 ct
478 334 475 337 475 339 ct
477 341 477 341 479 342 ct
479 343 481 343 481 343 ct
481 343 486 341 486 338 ct
488 336 488 336 489 334 ct
491 332 491 332 492 330 ct
492 328 493 326 492 324 ct
492 322 493 320 494 318 ct
495 315 498 314 500 312 ct
502 311 503 309 503 307 ct
504 302 499 299 495 296 ct
491 296 488 290 489 286 ct
494 281 491 277 494 271 ct
495 269 495 269 497 268 ct
502 269 505 270 509 273 ct
511 273 514 275 516 277 ct
517 278 520 281 522 280 ct
525 278 524 275 525 272 ct
525 270 523 267 521 265 ct
516 261 512 258 506 257 ct
503 257 501 256 498 253 ct
494 251 494 251 490 248 ct
486 245 486 245 482 242 ct
480 242 479 241 478 239 ct
476 238 476 237 476 236 ct
479 232 479 233 482 230 ct
483 227 478 225 476 226 ct
474 226 470 226 468 227 ct
464 227 464 227 460 226 ct
457 226 454 226 451 224 ct
448 219 448 219 445 215 ct
442 212 441 210 440 207 ct
437 199 437 199 434 191 ct
431 187 431 187 428 183 ct
424 179 422 179 419 177 ct
415 174 415 174 410 171 ct
408 168 406 165 404 163 ct
403 158 405 162 403 158 ct
402 155 399 153 400 150 ct
401 147 405 149 406 145 ct
406 142 400 139 401 136 ct
403 132 402 133 405 131 ct
407 129 414 123 418 123 ct
421 124 423 122 427 123 ct
428 124 431 123 432 123 ct
433 124 437 128 435 130 ct
434 132 430 130 430 133 ct
430 134 429 138 430 140 ct
430 143 431 144 433 146 ct
435 148 436 151 437 151 ct
438 150 440 148 441 147 ct
442 145 443 143 444 141 ct
446 141 448 140 449 141 ct
452 144 451 143 453 146 ct
454 149 452 150 454 153 ct
456 156 456 155 459 159 ct
461 160 460 162 457 161 ct
456 161 455 162 454 163 ct
454 164 457 168 459 169 ct
461 170 469 174 470 176 ct
472 177 470 179 471 180 ct
475 183 476 179 480 180 ct
486 183 486 186 488 188 ct
489 189 494 193 496 193 ct
498 194 500 196 500 197 ct
499 199 491 194 491 196 ct
491 199 495 199 499 201 ct
502 202 502 205 505 205 ct
506 205 504 203 505 202 ct
507 200 510 205 515 208 ct
517 209 519 211 519 213 ct
521 215 524 215 526 217 ct
527 217 530 215 531 215 ct
532 216 533 217 532 217 ct
530 218 529 219 529 219 ct
531 222 534 226 536 227 ct
538 231 539 230 541 230 ct
542 230 547 231 547 234 ct
548 240 547 249 548 257 ct
548 266 542 274 548 280 ct
550 282 551 284 553 287 ct
555 288 556 290 556 292 ct
558 297 559 299 561 304 ct
564 307 564 307 566 309 ct
566 309 567 306 568 305 ct
569 305 572 307 572 307 ct
574 306 576 307 576 307 ct
576 308 575 308 576 310 ct
576 311 575 313 571 310 ct
569 309 568 312 569 312 ct
569 313 569 315 571 315 ct
573 316 575 317 578 319 ct
580 321 580 323 583 326 ct
586 329 588 328 590 329 ct
593 329 593 328 596 328 ct
600 326 604 328 608 329 ct
614 329 616 327 621 329 ct
624 330 624 330 627 331 ct
629 332 631 334 631 336 ct
628 337 626 332 623 336 ct
619 335 616 334 611 333 ct
607 335 606 330 601 331 ct
599 333 595 336 595 338 ct
594 341 594 341 593 344 ct
594 346 595 348 597 349 ct
600 352 598 352 601 355 ct
605 360 603 362 602 365 ct
601 368 604 373 606 374 ct
611 376 607 367 612 367 ct
612 367 617 371 618 374 ct
621 378 620 378 623 378 ct
625 378 622 370 626 370 ct
628 369 631 369 634 373 ct
635 374 637 378 640 378 ct
641 378 639 370 637 368 ct
636 366 635 364 633 362 ct
631 360 631 359 629 358 ct
628 357 627 354 630 354 ct
633 353 633 354 634 355 ct
636 356 638 357 641 356 ct
643 356 642 354 639 351 ct
637 349 636 348 635 347 ct
635 345 633 345 634 342 ct
635 340 635 340 636 339 ct
639 338 642 339 644 340 ct
647 342 650 345 652 344 ct
656 342 648 332 652 331 ct
656 332 655 335 658 335 ct
660 336 663 330 659 330 ct
654 330 653 327 652 326 ct
651 325 652 323 650 320 ct
649 319 647 317 646 316 ct
644 315 642 317 638 316 ct
637 315 636 314 635 313 ct
633 311 634 311 633 309 ct
632 306 628 307 627 309 ct
624 307 626 302 627 302 ct
627 301 629 302 631 304 ct
633 305 634 299 628 297 ct
626 296 622 294 622 293 ct
623 290 621 288 620 283 ct
619 282 624 276 627 274 ct
628 273 628 274 629 275 ct
630 277 627 279 628 280 ct
630 283 629 282 631 284 ct
632 285 633 287 635 289 ct
637 291 640 292 642 290 ct
643 290 635 286 635 281 ct
636 280 638 281 639 282 ct
641 284 644 287 647 287 ct
649 286 645 282 643 281 ct
641 280 640 277 642 277 ct
647 276 649 284 654 285 ct
656 282 650 276 648 275 ct
646 273 648 273 645 271 ct
644 270 640 270 642 268 ct
645 268 645 268 647 268 ct
649 265 650 266 653 265 ct
654 265 656 263 658 262 ct
661 261 665 261 668 260 ct
672 259 675 259 678 262 ct
682 264 691 258 695 260 ct
695 262 693 264 690 264 ct
689 265 686 265 685 266 ct
684 266 682 269 681 269 ct
680 270 681 273 681 274 ct
681 275 680 277 682 277 ct
683 276 685 273 686 272 ct
688 270 690 268 693 267 ct
695 266 696 265 698 263 ct
700 261 702 258 702 256 ct
704 253 702 250 705 247 ct
708 245 711 245 714 244 ct
716 244 716 240 719 239 ct
724 239 727 240 732 240 ct
733 239 737 240 738 239 ct
741 236 742 231 742 231 ct
740 230 736 229 734 229 ct
729 229 726 226 722 221 ct
716 219 712 217 708 212 ct
706 210 704 208 704 206 ct
703 204 703 204 702 202 ct
701 201 701 201 700 199 ct
701 197 701 197 703 194 ct
704 192 704 192 705 189 ct
705 186 704 184 705 180 ct
708 177 714 173 713 170 ct
713 167 712 164 712 161 ct
711 157 711 154 710 151 ct
710 149 710 147 710 146 ct
711 143 711 143 712 141 ct
716 137 718 133 721 129 ct
722 125 726 122 726 118 ct
725 112 727 111 732 107 ct
735 102 739 100 743 97 ct
745 95 749 90 752 90 ct
754 90 757 86 763 88 ct
766 89 757 93 759 94 ct
763 95 765 97 769 96 ct
772 95 774 94 777 93 ct
779 93 783 94 785 92 ct
787 92 794 91 796 92 ct
797 93 799 93 798 95 ct
794 100 793 99 789 103 ct
785 105 780 105 780 110 ct
783 112 786 108 789 111 ct
789 116 795 113 799 115 ct
802 118 801 126 803 126 ct
807 127 808 129 814 127 ct
817 125 815 122 823 115 ct
824 114 828 113 830 112 ct
832 111 833 108 835 107 ct
836 105 838 106 840 106 ct
842 106 844 105 845 105 ct
849 105 847 105 850 103 ct
848 99 854 96 852 95 ct
846 92 844 96 842 97 ct
840 98 838 96 834 99 ct
830 103 833 100 828 100 ct
825 101 824 92 821 92 ct
818 92 819 91 818 87 ct
819 86 821 82 825 81 ct
826 81 827 80 829 79 ct
833 77 833 75 837 71 ct
841 68 841 69 845 65 ct
849 62 852 62 856 60 ct
858 58 862 56 864 53 ct
868 50 872 48 875 47 ct
877 47 882 44 884 43 ct
885 43 886 42 890 43 ct
894 43 886 52 881 53 ct
878 55 878 60 875 62 ct
874 63 868 63 867 65 ct
869 68 870 66 872 69 ct
874 70 878 69 878 71 ct
879 74 878 75 878 78 ct
878 81 880 83 877 85 ct
872 88 874 92 868 94 ct
867 95 867 93 864 95 ct
862 96 860 94 859 95 ct
861 99 854 100 855 102 ct
857 105 866 101 867 101 ct
872 102 871 107 875 107 ct
880 109 885 107 892 111 ct
901 113 899 118 908 120 ct
911 121 914 123 917 123 ct
920 123 923 123 926 126 ct
930 127 933 129 937 132 ct
942 133 945 133 950 135 ct
953 133 959 137 961 139 ct
965 142 968 150 969 151 ct
972 155 967 157 966 162 ct
966 165 962 165 959 170 ct
956 173 954 176 951 178 ct
946 181 946 180 941 183 ct
937 183 935 184 931 185 ct
928 185 925 184 922 185 ct
917 187 917 189 912 190 ct
908 189 906 192 902 190 ct
899 191 895 189 892 190 ct
887 190 887 190 883 190 ct
879 189 876 190 872 189 ct
869 189 866 190 862 186 ct
859 186 856 184 852 185 ct
849 183 846 186 843 184 ct
839 185 836 184 832 186 ct
828 189 828 189 823 191 ct
820 192 816 194 813 194 ct
808 197 808 197 803 199 ct
800 201 797 204 793 208 ct
788 212 788 212 783 216 ct
779 221 779 221 775 226 ct
772 229 769 229 766 230 ct
761 231 759 232 755 232 ct
753 234 749 232 746 232 ct
745 232 744 236 742 239 ct
742 240 745 245 753 246 ct
762 248 756 249 753 249 ct
751 250 747 249 743 249 ct
740 250 738 251 737 252 ct
738 253 744 255 741 255 ct
738 257 739 257 735 257 ct
733 256 732 259 730 259 ct
726 260 725 261 722 262 ct
719 262 718 259 716 259 ct
713 259 714 263 712 263 ct
710 264 710 267 706 267 ct
704 267 702 268 698 268 ct
696 268 685 275 685 280 ct
685 284 684 282 686 291 ct
690 292 695 285 699 288 ct
700 292 696 299 700 303 ct
700 306 698 310 698 310 ct
695 308 696 307 695 304 ct
694 302 692 306 693 308 ct
693 310 694 310 694 311 ct
695 312 690 312 692 315 ct
693 317 694 314 698 318 ct
701 317 699 313 702 313 ct
704 313 710 319 709 322 ct
708 326 705 328 706 329 ct
709 330 708 334 710 334 ct
713 335 716 336 718 336 ct
720 336 722 336 721 339 ct
720 340 717 339 716 340 ct
713 342 718 343 717 343 ct
718 345 724 344 725 345 ct
728 345 736 344 738 345 ct
739 346 735 347 732 348 ct
731 348 731 350 730 350 ct
729 351 728 349 726 351 ct
725 351 723 351 721 351 ct
719 353 720 354 721 355 ct
721 357 726 352 726 354 ct
726 354 730 353 731 353 ct
732 352 733 354 732 356 ct
731 356 733 356 734 356 ct
736 356 734 353 736 351 ct
737 349 739 350 740 351 ct
744 350 743 351 747 350 ct
749 350 750 355 753 358 ct
754 359 756 360 757 360 ct
760 361 771 358 774 361 ct
778 361 778 357 782 357 ct
784 357 785 359 788 356 ct
788 353 790 350 790 348 ct
791 344 792 343 796 340 ct
800 341 800 341 804 341 ct
807 341 806 342 810 343 ct
816 343 812 344 817 346 ct
821 345 826 347 832 350 ct
835 351 835 351 839 352 ct
841 352 841 352 843 352 ct
843 351 845 352 846 350 ct
849 350 851 349 854 348 ct
857 344 857 344 860 341 ct
861 339 864 335 867 336 ct
870 336 875 332 877 330 ct
883 325 881 327 885 327 ct
888 327 889 327 891 327 ct
897 326 897 325 899 322 ct
900 319 904 314 909 314 ct
909 314 913 315 913 318 ct
913 321 907 323 908 326 ct
910 331 908 337 911 340 ct
915 343 917 346 918 350 ct
918 354 918 354 918 359 ct
919 362 919 362 919 364 ct
920 366 920 366 920 369 ct
921 370 922 372 922 374 ct
922 375 921 377 920 379 ct
915 385 917 391 916 395 ct
917 401 916 401 914 407 ct
915 412 912 418 913 422 ct
912 429 912 429 912 436 ct
912 441 911 446 910 451 ct
910 454 908 456 907 459 ct
905 462 904 462 903 466 ct
901 469 899 469 897 470 ct
893 472 894 473 890 475 ct
887 478 886 476 883 479 ct
880 479 878 479 876 481 ct
869 484 860 479 853 477 ct
850 477 848 477 845 476 ct
842 476 841 477 839 477 ct
835 478 832 479 828 480 ct
822 483 824 483 818 487 ct
815 489 815 489 811 492 ct
805 495 808 495 803 498 ct
797 501 799 502 795 502 ct
791 503 779 504 776 503 ct
771 502 768 504 762 503 ct
756 501 748 501 741 499 ct
734 499 731 497 725 496 ct
724 496 723 496 723 496 ct
717 496 716 495 711 495 ct
707 495 700 495 698 495 ct
692 496 689 495 687 492 ct
686 488 681 487 677 487 ct
675 487 670 487 667 487 ct
661 486 652 485 649 484 ct
644 483 647 482 643 479 ct
638 475 634 475 630 474 ct
626 475 622 474 618 474 ct
612 474 606 478 602 479 ct
599 480 592 487 589 489 ct
587 491 585 497 584 502 ct
582 508 586 513 587 516 ct
589 518 589 521 588 525 ct
587 529 586 530 584 534 ct
582 538 581 539 578 543 ct
574 546 573 548 569 550 ct
565 550 560 553 556 551 ct
551 551 547 550 543 548 ct
536 544 527 541 518 538 ct
515 537 509 535 506 535 ct
500 534 497 534 492 533 ct
489 530 481 527 481 527 ct
481 527 480 526 479 525 ct
cp
de
%%DSIEndObject
}
def



/part2
{
%%DSIBeginObject: #13 - Ref:16 Bezier
Landcolor
np
342 207 mt
342 208 341 211 342 213 ct
343 218 337 216 334 217 ct
331 217 329 218 327 220 ct
326 221 326 222 325 225 ct
324 226 327 227 327 228 ct
327 229 324 229 324 231 ct
324 233 327 233 327 233 ct
328 235 326 236 326 238 ct
326 239 330 239 330 240 ct
329 241 326 242 328 244 ct
331 246 332 246 335 247 ct
338 247 340 243 340 241 ct
341 240 340 238 341 237 ct
342 235 342 232 342 230 ct
343 228 345 227 345 225 ct
346 223 346 221 346 219 ct
345 217 345 216 345 214 ct
345 212 346 209 345 207 ct
344 205 343 205 342 207 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #14 - Ref:18 Bezier
Landcolor
np
315 260 mt
312 263 314 264 313 268 ct
315 269 315 269 318 270 ct
319 274 319 274 319 278 ct
324 278 316 285 319 288 ct
319 294 319 298 316 303 ct
318 305 317 303 319 306 ct
319 309 319 308 319 311 ct
322 314 322 314 325 316 ct
327 316 327 315 330 315 ct
332 312 330 311 333 308 ct
336 308 337 310 341 310 ct
345 307 343 304 345 299 ct
345 294 347 288 347 282 ct
345 273 345 274 349 270 ct
348 263 345 257 336 252 ct
332 254 331 257 328 259 ct
323 261 319 263 315 260 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #15 - Ref:270 Bezier
Landcolor
np
414 342 mt
414 343 412 343 410 343 ct
408 342 406 343 405 345 ct
403 347 403 351 404 353 ct
406 355 407 354 409 355 ct
411 357 413 358 415 358 ct
418 359 420 361 422 363 ct
424 364 426 366 428 367 ct
430 368 432 369 434 370 ct
436 371 439 371 441 372 ct
443 373 444 375 446 377 ct
448 379 450 380 452 380 ct
454 380 456 380 459 379 ct
461 378 463 376 463 374 ct
463 369 461 367 460 365 ct
458 361 460 359 461 357 ct
461 355 462 353 463 351 ct
463 349 464 347 465 345 ct
466 343 469 337 467 336 ct
466 334 462 337 460 337 ct
458 337 456 338 454 338 ct
452 339 450 339 448 340 ct
446 341 444 343 442 343 ct
440 344 438 344 436 344 ct
434 344 432 344 430 343 ct
427 343 425 343 423 342 ct
421 342 419 341 418 341 ct
416 341 415 342 414 342 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #16 - Ref:269 Group
%%DSIBeginObject: #17 - Ref:271 Bezier
Landcolor
np
180 298 mt
181 298 182 299 184 298 ct
184 298 183 296 184 296 ct
186 294 186 293 185 292 ct
185 290 184 290 182 292 ct
180 294 179 294 179 295 ct
179 297 180 298 180 298 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #18 - Ref:272 Bezier
Landcolor
np
238 267 mt
237 265 237 265 234 264 ct
232 263 230 264 229 266 ct
228 268 229 268 232 268 ct
234 269 236 270 238 270 ct
239 269 238 269 238 267 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #19 - Ref:282 Bezier
Landcolor
np
207 268 mt
206 268 205 269 202 271 ct
200 272 197 272 197 274 ct
197 275 199 277 201 278 ct
202 278 201 278 203 278 ct
204 278 205 280 206 280 ct
207 281 208 283 209 283 ct
213 285 213 282 214 279 ct
216 276 217 276 218 274 ct
219 271 216 272 214 271 ct
212 269 213 266 212 266 ct
212 266 208 267 207 268 ct
cp
de
%%DSIEndObject
%%DSIEndObject
%%DSIBeginObject: #20 - Ref:285 Bezier
Landcolor
np
663 398 mt
662 398 662 398 662 398 ct
662 398 662 399 661 401 ct
661 403 661 405 663 406 ct
664 408 666 409 668 409 ct
670 409 672 409 674 409 ct
676 409 678 409 680 409 ct
682 409 687 408 688 409 ct
690 410 690 412 692 412 ct
694 412 696 411 698 410 ct
700 409 702 409 704 408 ct
706 407 708 406 710 406 ct
712 406 714 405 716 405 ct
719 405 720 404 720 402 ct
720 401 721 396 717 399 ct
716 401 715 400 713 400 ct
711 400 707 402 704 402 ct
702 403 701 401 701 399 ct
702 397 701 398 698 398 ct
694 399 693 401 689 400 ct
685 399 682 400 680 401 ct
678 401 676 403 674 401 ct
673 400 672 399 670 399 ct
668 398 665 398 664 398 ct
664 397 663 397 663 398 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #21 - Ref:8 Bezier
Landcolor
np
835 393 mt
834 393 829 391 826 394 ct
825 395 822 398 820 397 ct
817 396 817 398 818 399 ct
819 401 819 403 820 404 ct
821 405 822 406 824 407 ct
826 408 828 409 829 409 ct
830 409 832 409 833 409 ct
834 409 835 410 837 410 ct
838 409 837 408 838 408 ct
840 407 842 407 843 406 ct
845 405 848 402 849 401 ct
850 400 852 400 855 400 ct
859 399 860 398 856 397 ct
853 395 855 392 858 390 ct
862 388 868 381 869 378 ct
870 376 866 379 863 381 ct
860 383 856 386 854 387 ct
852 388 850 388 847 389 ct
845 389 842 388 839 388 ct
834 386 836 388 836 390 ct
836 391 835 393 835 393 ct
cp
de
%%DSIEndObject
%%DSIBeginObject: #22 - Ref:17 Bezier
Black
np
676 487 mt
668 507 677 496 678 511 ct
678 515 685 519 690 519 ct
699 520 701 525 703 533 ct
703 536 695 541 699 549 ct
702 556 710 550 719 560 ct
725 565 733 546 741 549 ct
749 551 760 553 771 542 ct
776 536 791 547 796 544 ct
802 541 809 531 812 527 ct
816 521 819 523 822 524 ct
824 524 827 514 850 519 ct
ds
%%DSIEndObject
%%DSIBeginObject: #23 - Ref:49 Bezier
Black
np
865 627 mt
855 625 853 619 844 619 ct
841 619 819 637 811 630 ct
798 618 792 612 781 613 ct
778 614 771 617 766 617 ct
754 619 750 605 743 605 ct
741 605 731 607 724 604 ct
722 603 715 594 712 594 ct
704 593 688 600 683 598 ct
ds
%%DSIEndObject
%%DSIBeginObject: #24 - Ref:50 Bezier
Black
np
495 270 mt
494 269 487 268 486 264 ct
484 261 473 257 469 256 ct
466 256 459 249 456 248 ct
451 247 450 241 448 238 ct
447 235 441 231 437 230 ct
433 229 424 232 424 231 ct
423 231 423 218 420 216 ct
418 214 419 209 417 206 ct
414 202 406 195 404 194 ct
399 192 398 189 397 185 ct
396 181 393 179 391 179 ct
388 178 385 173 384 172 ct
380 168 380 168 379 168 ct
376 168 375 167 372 167 ct
371 168 369 166 367 170 ct
366 174 363 174 361 175 ct
ds
%%DSIEndObject
%%DSIBeginObject: #25 - Ref:51 Bezier
Black
np
416 247 mt
417 243 420 239 421 238 ct
422 236 420 235 424 231 ct
ds
%%DSIEndObject
%%DSIBeginObject: #26 - Ref:52 Bezier
Black
np
436 196 mt
434 198 431 199 430 199 ct
428 200 424 200 422 200 ct
420 200 420 203 417 206 ct
ds
%%DSIEndObject
%%DSIBeginObject: #27 - Ref:53 Arc
Black
np
314 268 mt
300 273 274 274 254 271 ct
254 271 254 271 253 271 ct
ds
%%DSIEndObject
%%DSIBeginObject: #28 - Ref:54 Arc
Black
np
344 206 mt
344 198 353 192 364 192 ct
364 192 365 192 365 192 ct
ds
%%DSIEndObject
%%DSIBeginObject: #29 - Ref:55 Bezier
Black
np
402 133 mt
399 131 396 134 393 134 ct
391 133 384 134 383 139 ct
381 145 380 144 376 145 ct
372 147 369 145 367 144 ct
ds
%%DSIEndObject
%%DSIBeginObject: #30 - Ref:56 Bezier
Black
np
360 118 mt
361 112 360 110 365 107 ct
370 103 373 108 376 107 ct
379 106 384 104 388 102 ct
392 99 390 96 396 94 ct
400 93 399 95 407 93 ct
411 92 408 93 417 98 ct
423 101 425 99 428 103 ct
429 105 429 108 428 112 ct
427 114 423 117 424 122 ct
ds
%%DSIEndObject
%%DSIBeginObject: #31 - Ref:57 Bezier
Black
np
376 168 mt
375 164 374 159 373 157 ct
372 156 368 155 366 150 ct
365 148 369 140 366 136 ct
365 134 360 134 358 130 ct
356 126 363 119 359 117 ct
354 115 342 111 338 116 ct
331 122 331 125 324 124 ct
320 123 315 131 312 133 ct
311 136 315 143 311 145 ct
309 147 308 153 307 154 ct
307 155 308 163 310 166 ct
312 168 315 164 316 165 ct
317 168 318 168 318 170 ct
ds
%%DSIEndObject
%%DSIBeginObject: #32 - Ref:58 Arc
Black
np
446 499 mt
473 476 531 469 574 483 ct
580 485 585 487 589 489 ct
ds
%%DSIEndObject
%%DSIBeginObject: #33 - Ref:59 Bezier
Black
np
316 12 mt
314 18 322 23 320 27 ct
318 31 315 33 316 38 ct
318 42 320 42 321 42 ct
324 43 322 46 325 53 ct
326 56 327 56 332 58 ct
335 59 332 71 329 71 ct
323 72 333 80 325 86 ct
322 89 309 96 311 102 ct
313 105 310 111 313 117 ct
314 121 317 114 322 124 ct
ds
%%DSIEndObject
%%DSIBeginObject: #34 - Ref:60 Bezier
Black
np
406 94 mt
405 90 402 84 404 81 ct
405 78 407 76 407 74 ct
408 71 402 60 411 59 ct
416 59 413 51 421 50 ct
425 50 438 46 436 36 ct
435 32 442 28 440 25 ct
438 22 435 17 442 12 ct
ds
%%DSIEndObject
%%DSIBeginObject: #35 - Ref:61 Bezier
Black
np
522 266 mt
530 263 539 264 546 267 ct
ds
%%DSIEndObject
%%DSIBeginObject: #36 - Ref:62 Bezier
Black
np
562 551 mt
561 559 563 559 563 564 ct
563 570 566 565 565 573 ct
ds
%%DSIEndObject
%%DSIBeginObject: #37 - Ref:63 Bezier
Black
np
622 292 mt
618 291 617 292 612 294 ct
610 295 607 298 606 298 ct
602 301 599 298 596 298 ct
594 298 591 297 588 301 ct
587 302 583 308 576 307 ct
ds
%%DSIEndObject
%%DSIBeginObject: #38 - Ref:64 Bezier
Black
np
713 217 mt
705 214 701 220 699 222 ct
695 227 697 227 696 234 ct
695 240 693 239 691 242 ct
688 245 685 245 685 251 ct
685 257 683 256 684 262 ct
ds
%%DSIEndObject
%%DSIBeginObject: #39 - Ref:65 Bezier
Black
np
1047 171 mt
1042 173 1036 177 1033 177 ct
1027 177 1018 171 1012 170 ct
1010 170 1002 170 994 171 ct
989 172 982 169 981 168 ct
980 168 972 159 967 159 ct
ds
%%DSIEndObject
%%DSIBeginObject: #40 - Ref:66 Bezier
Black
np
762 231 mt
765 236 766 232 771 237 ct
775 241 769 246 771 251 ct
772 255 782 259 779 263 ct
778 266 775 266 771 269 ct
766 273 765 271 762 271 ct
758 271 753 271 749 276 ct
745 281 744 285 737 293 ct
ds
%%DSIEndObject
%%DSIBeginObject: #41 - Ref:67 Bezier
Black
np
958 218 mt
960 218 961 216 967 215 ct
974 212 970 207 973 200 ct
976 194 979 193 983 190 ct
992 185 991 178 990 171 ct
ds
%%DSIEndObject
%%DSIBeginObject: #42 - Ref:68 Bezier
Black
np
832 216 mt
842 218 843 221 845 227 ct
846 230 843 233 846 238 ct
848 240 853 240 855 249 ct
ds
%%DSIEndObject
%%DSIBeginObject: #43 - Ref:69 Bezier
Black
np
726 113 mt
711 98 709 92 707 88 ct
704 81 709 76 708 73 ct
704 66 694 63 693 63 ct
689 58 689 40 683 29 ct
679 22 676 20 662 12 ct
ds
%%DSIEndObject
%%DSIBeginObject: #44 - Ref:70 Bezier
Black
np
903 466 mt
909 471 914 482 917 486 ct
919 491 919 497 920 504 ct
ds
%%DSIEndObject
%%DSIBeginObject: #45 - Ref:71 Bezier
Black
np
943 553 mt
946 552 959 543 964 538 ct
964 537 968 534 973 528 ct
975 526 977 519 975 516 ct
974 513 970 507 969 506 ct
968 506 961 498 960 497 ct
959 496 949 493 948 493 ct
947 492 940 486 939 486 ct
938 486 930 483 928 483 ct
927 483 919 484 916 486 ct
ds
%%DSIEndObject
%%DSIBeginObject: #46 - Ref:72 Bezier
Black
np
937 464 mt
937 464 952 465 958 465 ct
967 467 978 474 981 475 ct
982 476 997 475 1000 477 ct
1001 479 1007 486 1010 488 ct
1013 490 1021 491 1022 492 ct
1024 492 1030 500 1034 502 ct
1035 503 1042 503 1047 503 ct
ds
%%DSIEndObject
%%DSIBeginObject: #47 - Ref:73 Bezier
Black
np
1047 275 mt
1041 271 1039 271 1033 271 ct
1030 271 1028 266 1026 266 ct
1022 265 1019 262 1015 262 ct
1010 263 1012 264 1002 263 ct
997 263 994 260 987 260 ct
980 261 978 265 971 266 ct
965 267 957 273 955 273 ct
ds
%%DSIEndObject
%%DSIBeginObject: #48 - Ref:74 Bezier
Black
np
850 184 mt
851 192 844 197 845 200 ct
847 206 836 212 833 215 ct
831 217 832 220 831 224 ct
830 226 820 236 812 239 ct
809 240 792 240 789 246 ct
786 251 785 256 779 260 ct
ds
%%DSIEndObject
%%DSIBeginObject: #49 - Ref:75 Bezier
Black
np
796 340 mt
794 333 783 333 785 330 ct
788 325 777 328 777 323 ct
778 321 778 319 778 317 ct
778 315 769 313 768 311 ct
768 310 770 308 769 304 ct
769 303 762 299 761 298 ct
760 297 759 292 756 292 ct
751 292 744 294 743 294 ct
742 294 733 291 732 291 ct
731 291 727 290 726 290 ct
725 290 719 292 714 291 ct
713 291 705 288 699 288 ct
ds
%%DSIEndObject
%%DSIBeginObject: #50 - Ref:76 Bezier
Black
np
778 316 mt
782 315 785 315 788 316 ct
790 318 800 321 802 316 ct
804 313 800 310 810 310 ct
816 311 818 300 821 300 ct
827 301 826 303 830 302 ct
831 302 835 300 838 300 ct
841 300 842 300 849 296 ct
ds
%%DSIEndObject
%%DSIBeginObject: #51 - Ref:77 Bezier
Black
np
811 492 mt
810 462 813 435 833 409 ct
ds
%%DSIEndObject
%%DSIBeginObject: #52 - Ref:78 Arc
Black
np
663 398 mt
653 394 645 387 640 377 ct
ds
%%DSIEndObject
%%DSIBeginObject: #53 - Ref:79 Bezier
Black
np
721 355 mt
722 373 713 387 701 398 ct
ds
%%DSIEndObject
%%DSIBeginObject: #54 - Ref:80 Arc
Black
np
221 221 mt
258 236 267 266 240 287 ct
220 302 189 310 157 306 ct
ds
%%DSIEndObject
%%DSIBeginObject: #55 - Ref:81 Line
Black
np
631 336 mt
635 340 li
ds
%%DSIEndObject
%%DSIBeginObject: #56 - Ref:82 Bezier
Black
np
78 280 mt
75 274 73 270 77 266 ct
78 265 80 261 83 258 ct
87 256 81 249 85 247 ct
90 244 88 240 94 237 ct
100 234 98 237 104 232 ct
105 230 115 224 119 225 ct
121 226 124 220 129 217 ct
132 214 145 218 148 210 ct
150 207 163 203 164 195 ct
ds
%%DSIEndObject
%%DSIBeginObject: #57 - Ref:83 Bezier
Black
np
188 196 mt
188 194 183 189 185 186 ct
187 183 183 179 188 174 ct
189 172 191 169 195 173 ct
196 174 207 177 212 173 ct
217 170 217 161 220 163 ct
223 164 228 158 228 154 ct
228 151 233 148 233 145 ct
233 142 236 140 236 141 ct
237 141 240 141 241 142 ct
243 143 248 141 252 142 ct
256 144 264 135 265 130 ct
265 127 282 125 283 123 ct
285 120 289 114 290 113 ct
295 109 297 104 312 107 ct
ds
%%DSIEndObject
%%DSIBeginObject: #58 - Ref:84 Bezier
Black
np
149 275 mt
140 268 130 271 125 272 ct
117 272 110 271 105 272 ct
100 273 97 276 92 277 ct
88 277 81 277 75 283 ct
70 288 67 283 63 284 ct
55 287 49 295 43 296 ct
39 296 33 299 30 303 ct
27 308 20 308 17 308 ct
ds
%%DSIEndObject
%%DSIBeginObject: #59 - Ref:85 Bezier
Black
np
136 186 mt
141 192 148 192 151 192 ct
156 191 168 197 170 196 ct
171 195 179 194 182 195 ct
185 195 195 199 196 198 ct
198 198 200 200 205 201 ct
206 201 211 205 220 200 ct
ds
%%DSIEndObject
%%DSIBeginObject: #60 - Ref:86 Bezier
Black
np
421 362 mt
423 391 400 410 372 416 ct
ds
%%DSIEndObject
%%DSIBeginObject: #61 - Ref:87 Bezier
Black
np
293 365 mt
282 335 299 311 316 303 ct
ds
%%DSIEndObject
%%DSIBeginObject: #62 - Ref:88 Bezier
Black
np
818 397 mt
783 409 758 409 719 404 ct
ds
%%DSIEndObject
%%DSIBeginObject: #63 - Ref:89 Line
Black
np
336 252 mt
336 247 li
ds
%%DSIEndObject
%%DSIBeginObject: #64 - Ref:90 Line
Black
np
475 338 mt
468 338 li
ds
%%DSIEndObject
%%DSIBeginObject: #65 - Ref:91 Bezier
Black
np
458 116 mt
474 111 464 95 466 90 ct
468 85 474 83 472 80 ct
470 77 479 70 466 61 ct
463 59 460 59 456 58 ct
454 57 451 48 448 49 ct
444 49 436 49 432 46 ct
ds
%%DSIEndObject
%%DSIBeginObject: #66 - Ref:92 Bezier
Black
np
596 349 mt
564 365 519 360 492 330 ct
ds
%%DSIEndObject
%%DSIBeginObject: #67 - Ref:93 Bezier
Black
np
578 248 mt
581 248 583 242 589 240 ct
589 240 597 240 598 238 ct
600 234 598 236 599 231 ct
599 224 603 223 607 221 ct
610 219 616 211 624 213 ct
635 217 635 217 645 215 ct
650 213 654 211 658 212 ct
665 212 664 216 669 222 ct
673 226 681 223 682 225 ct
689 233 685 231 695 235 ct
ds
%%DSIEndObject
%%DSIBeginObject: #68 - Ref:94 Bezier
Black
np
865 336 mt
863 334 859 330 859 330 ct
858 327 853 327 854 321 ct
854 320 856 310 856 308 ct
857 300 846 302 849 296 ct
852 292 851 292 854 287 ct
855 285 864 283 863 279 ct
862 276 856 273 856 269 ct
857 263 858 255 854 253 ct
852 251 855 249 860 246 ct
867 242 876 246 882 245 ct
894 243 887 239 895 236 ct
896 236 907 237 915 234 ct
918 234 919 230 922 230 ct
928 228 928 229 933 228 ct
937 227 940 221 944 222 ct
947 223 958 217 958 219 ct
962 230 948 238 947 245 ct
946 252 950 252 948 255 ct
947 258 945 258 943 261 ct
940 266 953 268 955 274 ct
958 279 946 285 936 287 ct
933 287 934 292 931 292 ct
926 293 916 303 915 305 ct
914 308 914 311 910 314 ct
ds
%%DSIEndObject
}
def




/part3
{
%%DSIBeginObject: #69 - Ref:95 Bezier
Black
np
912 428 mt
916 427 915 428 918 429 ct
922 429 923 425 925 426 ct
928 427 929 436 929 437 ct
932 440 933 447 934 448 ct
935 448 933 454 935 456 ct
936 458 937 461 937 465 ct
936 468 935 471 935 472 ct
936 477 937 479 935 485 ct
ds
%%DSIEndObject
%%DSIBeginObject: #70 - Ref:96 Bezier
Black
np
869 378 mt
882 371 904 365 920 365 ct
ds
%%DSIEndObject
%%DSIBeginObject: #71 - Ref:97 Bezier
Black
np
912 440 mt
879 444 849 444 817 438 ct
ds
%%DSIEndObject
%%DSIBeginObject: #72 - Ref:98 Bezier
Black
np
549 131 mt
550 130 551 118 555 115 ct
563 111 569 115 574 114 ct
578 114 587 99 592 99 ct
597 98 603 96 611 97 ct
620 99 623 84 634 76 ct
644 70 662 72 666 74 ct
673 76 674 77 682 73 ct
689 70 685 65 692 62 ct
ds
%%DSIEndObject
%%DSIBeginObject: #73 - Ref:99 Bezier
Black
np
467 98 mt
480 104 490 95 498 102 ct
500 103 502 112 512 110 ct
519 109 515 127 526 127 ct
528 126 528 131 535 129 ct
541 127 557 135 558 136 ct
560 138 566 151 570 155 ct
573 159 576 163 581 165 ct
587 168 599 168 600 171 ct
602 181 614 188 616 191 ct
620 200 608 203 617 213 ct
ds
%%DSIEndObject
%%DSIBeginObject: #74 - Ref:100 Bezier
Black
np
593 298 mt
594 294 597 287 596 283 ct
595 278 590 276 588 274 ct
586 272 587 269 585 267 ct
583 265 583 264 579 262 ct
576 261 580 256 578 253 ct
577 250 579 249 578 248 ct
576 245 574 245 570 243 ct
568 243 566 239 565 239 ct
562 239 560 240 558 240 ct
556 240 555 235 554 235 ct
552 235 549 235 548 239 ct
ds
%%DSIEndObject
%%DSIBeginObject: #75 - Ref:101 Bezier
Black
np
428 104 mt
438 103 442 106 445 109 ct
447 111 447 115 450 115 ct
458 117 461 115 471 124 ct
475 128 472 134 478 138 ct
483 141 488 145 496 146 ct
498 147 497 156 504 161 ct
509 164 517 166 520 169 ct
525 173 528 172 532 175 ct
538 181 531 183 537 189 ct
542 194 543 187 547 191 ct
549 193 553 197 557 203 ct
562 210 565 220 568 221 ct
572 222 567 232 565 239 ct
ds
%%DSIEndObject
%%DSIBeginObject: #76 - Ref:102 Bezier
Black
np
960 355 mt
969 346 967 337 965 334 ct
963 331 954 326 952 323 ct
951 318 957 317 954 314 ct
951 311 948 307 947 307 ct
939 303 940 303 936 301 ct
932 300 932 292 932 292 ct
ds
%%DSIEndObject
%%DSIBeginObject: #77 - Ref:104 Bezier
Black
np
917 394 mt
920 395 926 397 929 396 ct
934 393 940 388 945 389 ct
946 390 954 395 958 392 ct
962 388 961 387 966 384 ct
972 381 968 367 968 366 ct
966 363 964 355 956 354 ct
950 354 950 353 945 349 ct
941 345 936 347 932 348 ct
931 349 926 355 918 355 ct
ds
%%DSIEndObject
%%DSIBeginObject: #78 - Ref:106 Bezier
Black
np
957 392 mt
959 397 955 399 956 403 ct
957 407 960 407 960 411 ct
960 414 954 420 952 423 ct
951 426 945 421 943 427 ct
941 434 935 429 929 434 ct
ds
%%DSIEndObject
%%DSIBeginObject: #79 - Ref:107 Bezier
Black
np
969 380 mt
982 374 984 378 986 377 ct
990 375 998 371 1001 369 ct
1004 366 1015 371 1016 371 ct
1016 371 1029 378 1030 377 ct
1031 377 1035 382 1047 376 ct
ds
%%DSIEndObject
%%DSIBeginObject: #80 - Ref:108 Arc
Black
np
137 333 mt
156 337 170 350 175 367 ct
ds
%%DSIEndObject
%%DSIBeginObject: #81 - Ref:109 Bezier
Black
np
701 551 mt
700 558 704 565 693 568 ct
686 571 682 577 681 579 ct
677 585 686 597 682 599 ct
678 601 669 605 665 613 ct
661 618 661 621 660 624 ct
657 628 645 634 643 634 ct
640 634 629 625 622 629 ct
618 631 608 622 602 623 ct
597 623 590 623 582 626 ct
574 629 564 624 551 619 ct
541 616 542 620 538 622 ct
532 626 529 622 521 620 ct
513 619 507 613 507 613 ct
507 608 503 602 503 598 ct
504 590 510 586 512 579 ct
513 574 523 586 534 584 ct
536 583 545 584 547 581 ct
548 578 559 572 567 573 ct
579 574 584 569 586 568 ct
594 565 601 557 608 555 ct
614 554 611 550 620 547 ct
623 546 627 547 640 547 ct
646 547 662 552 663 556 ct
667 573 682 560 685 574 ct
ds
%%DSIEndObject
%%DSIBeginObject: #82 - Ref:110 Bezier
Black
np
345 297 mt
363 297 398 300 418 341 ct
ds
%%DSIEndObject
%%DSIBeginObject: #83 - Ref:112 Bezier
Black
np
501 674 mt
500 670 494 659 492 657 ct
489 655 481 651 479 649 ct
475 646 482 639 481 635 ct
481 632 479 629 479 624 ct
ds
%%DSIEndObject
%%DSIBeginObject: #84 - Ref:113 Bezier
Black
np
415 492 mt
414 498 413 502 401 506 ct
400 507 380 508 374 511 ct
365 515 357 502 352 500 ct
348 498 336 501 332 497 ct
318 482 313 499 301 495 ct
293 492 288 504 283 503 ct
274 502 265 495 263 492 ct
259 484 249 484 246 485 ct
243 487 240 488 239 487 ct
239 487 221 481 212 485 ct
207 487 200 491 189 491 ct
185 490 181 492 169 507 ct
162 515 144 507 143 507 ct
141 508 124 516 114 516 ct
112 516 99 508 91 507 ct
90 507 69 516 65 517 ct
61 518 43 535 40 535 ct
37 536 21 538 17 538 ct
ds
%%DSIEndObject
%%DSIBeginObject: #85 - Ref:114 Bezier
Black
np
233 486 mt
235 479 230 473 227 470 ct
224 467 222 460 224 452 ct
225 447 230 443 229 441 ct
227 437 224 425 224 425 ct
224 425 223 421 227 415 ct
232 409 240 402 243 402 ct
251 400 258 399 262 398 ct
ds
%%DSIEndObject
%%DSIBeginObject: #86 - Ref:115 Bezier
Black
np
507 613 mt
484 633 481 626 468 616 ct
463 611 452 606 441 611 ct
433 614 417 593 409 595 ct
402 597 387 577 386 576 ct
384 573 373 579 369 575 ct
365 571 353 568 347 566 ct
340 563 336 548 335 545 ct
331 535 316 527 315 524 ct
309 515 286 529 284 503 ct
ds
%%DSIEndObject
%%DSIBeginObject: #87 - Ref:116 Bezier
Black
np
380 509 mt
391 518 379 521 385 527 ct
387 528 404 527 411 532 ct
414 534 434 538 438 540 ct
442 542 447 559 451 560 ct
459 564 469 562 478 578 ct
482 585 505 572 513 578 ct
ds
%%DSIEndObject
%%DSIBeginObject: #88 - Ref:117 Bezier
Black
np
362 396 mt
349 396 348 403 340 407 ct
331 411 323 410 315 412 ct
308 413 297 404 288 406 ct
282 407 279 407 269 403 ct
256 397 260 388 259 386 ct
256 383 253 380 251 377 ct
249 374 252 370 253 361 ct
ds
%%DSIEndObject
%%DSIBeginObject: #89 - Ref:118 Bezier
Black
np
304 409 mt
302 409 293 418 296 426 ct
299 434 294 437 294 441 ct
295 448 297 448 302 452 ct
307 455 315 453 319 454 ct
327 454 333 459 337 459 ct
342 459 349 450 354 451 ct
ds
%%DSIEndObject
%%DSIBeginObject: #90 - Ref:119 Bezier
Black
np
322 491 mt
325 483 315 486 315 479 ct
314 467 307 475 303 468 ct
300 464 293 457 298 449 ct
ds
%%DSIEndObject
%%DSIBeginObject: #91 - Ref:120 Bezier
Black
np
701 495 mt
711 457 703 431 693 412 ct
ds
%%DSIEndObject
%%DSIBeginObject: #92 - Ref:136 Bezier
Black
np
780 357 mt
786 377 783 392 773 407 ct
ds
%%DSIEndObject
%%DSIBeginObject: #93 - Ref:137 Bezier
Black
np
537 356 mt
543 396 541 443 531 476 ct
ds
%%DSIEndObject
%%DSIBeginObject: #94 - Ref:138 Bezier
Black
np
665 408 mt
585 433 475 431 402 403 ct
ds
%%DSIEndObject

{
%%DSIEndObject
%%DSIBeginObject: #97 - Ref:195 Text
Green
stm
28. fts
/___FN5 mb cvsf
Green
F sa
36. 609.84 mt
(T) show
T sa
rtm
stm
21. fts
/___FN5 mb cvsf
F sa
52 609 mt
0.69 0.69 ta
(HE ) 3 1 35.6938 tf
T sa
rtm
stm
28. fts
/___FN5 mb cvsf
F sa
89 609 mt
(A) show
T sa
rtm
stm
21. fts
/___FN5 mb cvsf
F sa
108 609 mt
0.69 0.69 ta
(NCIENT) 6 0 79.8339 tf
T sa
rtm
Green
stm
28. fts
/___FN5 mb cvsf
Green
F sa
36. 637.8398 mt
(M) show
T sa
rtm
stm
21. fts
/___FN5 mb cvsf
F sa
63 637 mt
0.69 0.69 ta
(EDITERRANEAN) 12 0 167.0229 tf
T sa
rtm
Black
stm
12. fts
/___FN6 cvsf
Black
F sa
36. 658.6395 mt
0.3799 0.3799 ta
(Copyright  2001  Don Hessong) 28 5 168.0722 tf
T sa
rtm
%%DSIEndObject
}

%%DSIBeginObject: #179 - Ref:123 Group
%%DSIBeginObject: #180 - Ref:124 Arc
Black
% 1.1016 1.1016 sp
% 1 lj
np
354 240 mt
356 241 358 245 356 249 ct
356 250 356 250 355 251 ct
ds
%%DSIEndObject
%%DSIBeginObject: #181 - Ref:125 Polygon
Black
np
356 238 mt
350 237 li
353 242 li
356 238 li
cp
de
Black
np
356 238 mt
356 239 li
349 237 li
350 236 li
356 238 li
cp
350 236 mt
350 236 li
353 242 li
353 243 li
349 237 li
350 236 li
cp
353 243 mt
353 242 li
356 237 li
356 238 li
353 243 li
353 243 li
cp
df
%%DSIEndObject
%%DSIBeginObject: #182 - Ref:127 Polygon
Black
np
354 249 mt
351 255 li
357 253 li
354 249 li
cp
de
Black
np
353 248 mt
354 249 li
352 255 li
351 255 li
353 248 li
cp
351 255 mt
351 255 li
357 252 li
357 253 li
351 256 li
351 255 li
cp
357 253 mt
357 253 li
353 249 li
354 248 li
357 252 li
357 253 li
cp
df
%%DSIEndObject
%%DSIEndObject
%%DSIBeginObject: #183 - Ref:128 Group
%%DSIBeginObject: #184 - Ref:129 Arc
Black
np
65 359 mt
68 363 68 368 65 371 ct
65 371 65 371 65 372 ct
ds
%%DSIEndObject
%%DSIBeginObject: #185 - Ref:130 Polygon
Black
np
68 358 mt
62 355 li
64 361 li
68 358 li
cp
de
Black
np
68 358 mt
68 359 li
62 355 li
62 354 li
68 358 li
cp
62 354 mt
63 355 li
64 361 li
63 361 li
62 355 li
62 354 li
cp
63 361 mt
64 361 li
68 357 li
68 358 li
64 362 li
63 361 li
cp
df
%%DSIEndObject
%%DSIBeginObject: #186 - Ref:131 Polygon
Black
np
63 369 mt
61 376 li
67 373 li
63 369 li
cp
de
Black
np
63 369 mt
64 369 li
62 376 li
61 375 li
63 369 li
cp
61 375 mt
61 375 li
67 372 li
67 373 li
61 376 li
61 375 li
cp
67 373 mt
66 373 li
63 369 li
63 369 li
67 373 li
67 373 li
cp
df
%%DSIEndObject
%%DSIEndObject
%%DSIBeginObject: #187 - Ref:132 Group
%%DSIBeginObject: #188 - Ref:133 Polygon
Black
np
467 315 mt
472 317 li
466 320 li
467 315 li
cp
de
Black
np
466 315 mt
466 314 li
473 317 li
472 318 li
466 315 li
cp
473 317 mt
473 318 li
467 320 li
466 319 li
472 317 li
473 317 li
cp
467 320 mt
466 320 li
466 314 li
467 314 li
467 320 li
467 320 li
cp
df
%%DSIEndObject
%%DSIBeginObject: #189 - Ref:134 Polygon
Black
np
460 325 mt
457 331 li
456 324 li
460 325 li
cp
de
Black
np
460 324 mt
461 325 li
457 331 li
456 330 li
460 324 li
cp
457 331 mt
456 331 li
455 324 li
456 324 li
457 330 li
457 331 li
cp
455 324 mt
456 324 li
461 325 li
461 326 li
455 325 li
455 324 li
cp
df
%%DSIEndObject
%%DSIBeginObject: #190 - Ref:135 Arc
Black
np
458 325 mt
458 321 463 317 467 317 ct
ds
%%DSIEndObject
%%DSIEndObject
}
def

%%EndProlog
